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000026 






050114 041106 



MJ. 



000000 

000000 
000000 



000122" 




t ******** 



begin: 

MODNAMs 

IBM?' 






SEQ 0004 



11* 



VERSION 
"IN 



.... E^fSER^ULE 
23-MAY-78 



t************,*****************************************^** 



HRDCNT 
?.Q£P&§ 



. ASCTT /LPFB / ^MODULE 

i«Bo*o 6p " 

754+0 

.BYTE PRTY4+0 

•BYTE PRTY+0 

OPEN 
OPEN 

Wh 

*************** ******** 
140000 

am 



OPEN 
OPEN 



m 
mi" 

8E EN 

OPEN 
160 

:BKIt 



NAME. 

»li D D!Jigi E JoIBI CK 0F MBaFF USAGE 

DEVICE VECTOR. 

BR LEVEL. 

BR LEVEL. 

JCE INDICATOR 1. 

JSWITCH REGISTER 1 
;SWITCH REGISTER 2 

{lip BEHHBfi I 

JSTATUS WORD. 

? MODULE START ADDR. 

;HODULE STACK POINTER. 



PASS COUNTER, 

# OFITERATT&NS P 

..SAVE HARI 




IR PA 

m 



SS=40 

ERRORS 
ERRORS 

s per pass 
># Pf;sys~errors-accu8ulatId pass 

Jm5|8iS8 eB^ ^"" | - ra - 5 MACR0 IS CALLED 



•mbISXIS ES5 Monitor use 
;reserved for monitor use 



PRESERVED FOR MONITOR 
*L0C TO SAVE Rr 
JLOC TO SAVE R 
SAVE R 

ilfEB 



es ItL SR 0r 



;loc to 

m ?b 

nm sf 

;CONTENTS OF CSR. 
*£B?S..9 F B ^D D*TA r OR 
^STATUS REG CONTENTS. 
?TYPE OF ERROR 

JHffiH"B»?BT»- 

JBBBII"; *BBWi! »K 8 !tI!«t!5» pms 



WiJKiil 11 nVJSrlWim H0DULE 



000224' 
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.WORD 
.LIST 

modsp: ' endr 
:s%m**%^^i^s********** ft ***^*** ft **-*- 

OPT0UF=4QQ0 

vnm\ mm 
vtmv mm 

vm\ mm 
fcPfBB? mm 

iBftBSJ" 1 ""* 



SEQ 0005 



******* ************* ftftAftftfta 




TSTMOD=4 
PARENB=2 
GO=I 
PARITY=10000 

;definitions for lpcsrb 

LPTPBT=10000 
LPTPAR=40 
START: MOV 

MOV 

ADD 

MOV 

ADD 

± 



m 
m 
m 







A ' «• 



IPFB DEC/Ml SySTEH_ EXERCISER MODOLE 



a 



12-OCT-78 11:59 

!8- : m il 



MACY11 30AU052) 
DEFINITIONS 
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0, fcg CCTR 
0,LPTDAT 



itt- 

432 



88? 

MOVB 
CLRB 






iffhRFH" s iH§cV?l R ?i?i R M0D ""- E 



090362* 005000 
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~»— — • INS 
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DEFINITIONS 

JRAM MEMORY FLOATING 1*S AND 0*S DATA TEST. 



mm- 



000404' 

mm- 

000424* 

mnv- 
mur- 
ium'- 

000466* 



mm sum. 

Ilii» milt 

012777 001400 177612 

mm mm im » 

005177 177610 

ma mm 
mm 



ksTl: 
1$: 

2$: 

35: 



177446 
177440 177440 



mm mm mm 

10 4404 000000* 



mm mm 

000476* 005200 

mnv mm oo ° 377 



4$: 



R0 
#LOINITlRSTERR,BLPCSRA 



;R0=CURRENT (RAM ADDRESS. 

ST LENGTH. 

ST DATA ADDRESS. 






TO ASB. 

FOR TYPEOUT. 



;INIT LP20. 



JLOAD (RAM) 
JLOAD (RAM) 



ADDRESS REGIST 
WITH TEST PITT 



rB ls. 



CLR 

MO? 
MOV 

MOV 
MOV 

MOV 

MOV 
MOV 

COM 

MOV 
MOV 

CMP 
BEQ 

88? E&cs^Rr 

«tSt:s«Br*'""*""rs;!raMjiir"""""*""' 



RfttHno 

iLPCCTR 

R0#|LPCCTR 
gLPRAMD/ANAS 



if 



B,AHAS 



;disturb THE ADDRESS REGISTER. 

tf?*« D A£ R R-E ; S Di?g R ?§ S , R ?§!" EI '- 
TEST RESULTS. 



J5S? T 



******** 
******** 



ggg R J 

INC R0 



CMP 
BLOS 



R0/#RAMTOP 



|ggrj OF LIST YET? 

?OPDATE (RAM) ADDRESS. 
;DONE YET? 



kWbRsh 11 nmfiv 



ra 



SgR MODULE 



Bffi&y^ 1052 
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?RAM MEMORY BASIC ADDRESS TEST* 



000506* 005000 
000510" 912777 

mm- mw 

000526* 005200 



imu 



001400 177506 

177516 
177510 



000377 



mm- mm 
mar- mn 
mm- mm 

mm- mm 

000602* 017767 
000610' 016767 

000616' 104404 000000' 
OO0622* 005301 

mm- mm 0000,,o 



mm 

ITHH 177330 

HUH 177316 

177310 177310 



177416 177272 
177410 177262 



IeST2s 
1SJ 



CLR 
MOV 



MOV 

MOV 



CMP 
BLOS 



R0 ?R0=CURRENT (RAM) ADDRESS 

#L0INIT!RSTERR,?1LPCSRA ;INIT LP20 



R0,@LPCCTR 
R0,#LPRAMD 



R0,#RAMTOP 



5EACH (RAM) IS LOADED WITH ITS 
JUPPER (RAM) ADDRESS. 



2SS 
3SS 



A%1 



MOV 
MOV 



MOV 

MOV 



MOV 
BIC 



CMP 
BEQ 



MOV 
MOV 



************** 

flSilt*t§fi!* 



#RAMTOP,Rl 
Rl/WASADR 

Rl.gLPCCTR 
§LPRAMD,AWAS 

#P&RITY*AWAS 

ASB,AHAS 
4$ 

gLPCSRA £ ACSR 
LPCSRA,CSRA 



?LQAD (RAM) ADDRESS. 
JL0AD (RAM) DATA REGISTER. 

JUPDATE (RAM) ADDRESS. 

JALL (RAMS) LOADED? 

IDDRESS NOW TEST IT. 



jRlsTOP OF RAM MEMORY. 

?SAVE (RAM) ADDRESS FOR TYPEOUTS, 

?LOAD (RAM) ADDRESS 
?ACTUAL RESULTS TO AWAS. 

?EXPECTED RESULTS TO ASB* 
JCLEAR PARITY BIT. 

JTEST RESULTS. 
JOK! 



*************%■ ******** 



**********! 



CMP 
BLOS 



Rl,#RAHBOT 
2S 



*********************** *********«%******& 

****************** ************ ***ftftft*ftftft* 

; ADJUST (RAM) ADDRESS. 

7 ARE HE AT BOTTOM OF (RAMS)? 
/MO I 



kiih^ui 11 nmhiwa 



RCISER MODULE 
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lillll 
ll!l r 




001400 177364 

000644 

001126 

177753 000110 

111' 



000002 177106 
000200 



!!ili$: m 



JTEST3 PRINTS A LINE OF ALL LE 

RESTRTS 

TEST3I MOV #LOINIT!RSTERR, 

JSR PC,RAMSET 
JSR PC,VFULOX 

JSTART PRINTING 

TEST3AS MOV 



1$: 
2$: 

3$S 



5$? 



88? 

MOV 



INC 
BEQ 



BITB 
BEQ 

CMP 
BEQ 
BR 

CMP 

BEQ 



MOVB 
CLRB 

981 

INC 
BNE 



R2 
|2,SR1 

#200 # R2 
3$ 
#140, R2 

tohi n >* 
mmtv 

CYCCNT 



SEQ 0009 
IGAL CHARACTERS FOLLOWED BY A LINE OF ALL ILLEGAL CHARACTER 
,®LPCSRA UNIT LP20. 

;load VFU 



#-21.,CYCCHT ?SET 21 LINES. 

#40, R2 
R2,<R1>+ 



JMP 

cyccnt: o 

BUFFERS .BLKW 
;TEST LISTS 



ENDI?$, BEGIN 
TEST3 
140. 



fD2LS 



TO 132(10). 



2§f T »SHA R &JsS ER COUNTS 
5 SlS T 9£J „§ UF FER ADDRESS. 
JSET FIRST CHARACTER. 

JLOAD PRINT BUFFER. 

*5S9S5J! E 8T CHARACTER COUNT. 
7BRANCH IF LINE IS FINISHED. 

?NEXT CHARACTER. 

JCHECK CHARACTER SET. 
;BRANCH IF 64 CHARACTER SET. 

ILEGAL CHARACTER? 

7MAKE SPACE IF NOT LEGAL. 

^CONTINUE IF LEGAL. 

PLEGAL CHARACTER? 

imiiwt ilii: "«■■• 

IISSUE LINE FEED, 

>LOAD BUFFER TERMINATOR. 

7PRINT THE BUFFER. 
IDONE ALL LINES? 

?SIGNAL END OF ITERATION. 
JMONITOR SHALL TEST END OF PASS 



Jgjj;T02L/2 



*• • 



itBeKSH" IKS&ftli?!! H0D ""- E BKHM8M" 5 " 12 ' "- 7e 16i " P,GE » 




T02Z: 



k p M*ui n mi^wimi mddole 



HACYll 30AU052) 
**"" IONS 
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1 

411 
416 

il 



1881: mu 

001524* 010001 
001526- 010177 
001532* 005200 

mnv mm 



001400 
176514 



000377 



176506 



DEFINITIQ 

}k DESIRED VALUE/DEPOSIT THE VALUE INTO "RAMDUP" AND RUN "RAMSET M 

&AMSET: 



1$: 



001542* 00 
001544' 00 



►207 
1000 



MOV 

MOV 

MOV 

INC 

CMP 
BNE 



RTS 
'RAMDUP: 



jLOIH I t.RSI E R 1 ,, g Lg g?? J H JJ 1( J lH LP20. 

RO/SLPCCTR 

R0,R1 ;SET ADDRESS. 

R1,@LPRAMD ;LOAD THE RAMS. 

RO JUPDATE RAM ADDRESS. 

RO,#RAMTOP 



&WM 11 s HW*g RC J?§§ H0D,,LE 

42 

*1 
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.n***.,.* ™£l?f?J ROUTINES HANDLE PRINTING AND TEST PRINTING. 
JPATBUF CONTAINS THE ACTUAL DATA AND IS 400(8) OR 256(10) WDS 
?LONG. LOAD WITH CHRLOD. CHRLOD HILL PUT WHAT YOU TYPE INTO Tl 



Sttffc 



BHWi 

tsttyp: 

SETDEL: 

vmi 



THE BUFFER. 
;+ n BYTES IN BUFFER 

> T ? T „IX P , E , T0 BE BDN DURING TEST (RIGHT JUSTIF) 
^rlSSi*.Jl!!BCHR f .BEFgRE SETTING GO,0=DON'T 



JO 



m%i 



NTENX, 
CNTR 



imm mhiw 



?=DON'T 
THIS 



BEFORE SETTING GO 
OM GOOD DATA 



I 

r 
i 

001646* 
001646' 

mm- 



flf 






SI 



00O004 

mm 



000000' 
100000 



m 



176412 
176376 



176362 



001654' 
176342 



mm m ww »-« 
urn mm mn \m 



001722' 
001730' 

mm 



104405 
104410 

mm 



000000' 
000000' 
000002 



000000 



1 mm m \ 



76256 

40000 176246 



9$: 
LPINT: 

1$: 
2$: 



5$: 



JTHIS ROUTINE ACTUALLY 
MOV |pATBUF c aLPBSAD 

MOVB 
JSR 



TSIZ,&LPCTR 

PAGeL&LPPCTR 
TSTTYP,§LPCSRB 
fC*CKSR 
#103,(aLPCSRA 



PRINTS ON THE LPT 
9LPCSRA JINIT LP20. 
JSET UP BUS ADR 
>SET UP + NR BYTES 
? NEGATE TH" " 



;GO CHECI 



/SET UP TSTTYP 
K r, SRl" OPTIONS 



>NOW SET 
;EXIT TO 



GO AND PARENS 

MONITOR. MODULE WAIT FOR INTERRUPT. 



X 



IRQ$/BEGIN,1$ ? QUEUE UP TO CONTINUE AT IS AND RTI 



BIT 
BEQ 



#100000#@LPCSRA 



ENDS/BEGIN 

III f|00,@LPCSRA 



»ESBi*6ft6S R 

§LPCSRB,ASTAT 



>ERROR FLAG SET? 

?NO! 

?YES. 



Ithtt 



FOR A FLAG 



MOV 



* *********************** ********************************* 
HRDERS, BEGIN, NULL ; 

; ****************************** 

END$, BEGIN ; 



**** 
********************************* 



JSR 
RTS 



PS 



,TSTFLG 



;decide what to do 



iKi« r aiHF,iim.FVH 8 ii 



tstflg: tstb 



SLPCSRA 
#40000, {8LPCSR& 



;IS IT DONE? 

?IS IT pHPillB? 



LfFB DBC/J11 SYSTEM EXERCISER MODULE 
XLPFB0.P11 12-OCT-78 11:59 

589 253.756- 001403 

m ill!- : ii unit mm 
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SPFLG: 
DNFLG! 



BEQ 
MQV 
BIS 
RTS 



SPFLG 



ft 



SEQ 0013 



;NO 

ni?'g§ s Sc»f N p4GEs 

;CONTINUE 



. ; : ) 



LPFB DEC/XU SYSTEM EXERCISER MODULE 
XLPPB&. Pil 12-OCT-78 11:59 



ft 



it 



176210 



W P 

056- 116777 
064- 112777 
072" 052777 



88Ii:8 Q - 



132777 100000 176116 



06- 001402 
002110' 104410 000000- 

060200 176102 



m mm 

2130; 19527" 

m splint 

204- 0052 

11!'- ii mm 

}jj lUW- Uim 000056 

§ mm- mm 

t m m im 




2^37- 



177372 

177400 177360 
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DEFINITIONS 

..? H £.BE IS THE ROUTINE TO LOAD THE VFU. SET UP THE BUFFER 
;AT "VFUDAT A TO THE DESIRED DATA AND "VFU§IZ fi TO THE 

;desired size and run vfulox. 



||1 lllUVllUVi 0040l " , l76222 
? ° WW am 

52020- 06670* **~" 



1' Willi 

lit \m\ 



BIT 
BNE 

MOV 

MOV 

ADD 

MOV 

MOV 

MOV 

ADD 

NEG 

MOVB 

MOVB 

BIS 

BIT 
BEQ 



2$: 



3$: 



vfusiz: 

LPTMES: 



1$: 



|OPTOUF,gLPCSRB 

fWJ8BJK3 TBRR '* LPCSR * 



mm 



r ,flLPBSAD 

gLPCTR 
tSTTYP,(|LPCSRB 



#100000, (8LPCSRA 



;OPTICAL VFU? 
>YES! 

?INJT LP20. 

JCALCULATE END OF BUFFER 
JPQINTS TO NEXT BYTE 
J STOP VFU LOAD CODE 

;set up bus adr 
jset up + nr bytes 
;2 extra bytes on vfu load 
;negate the count 

;set up tsttyp 

;set up for vfu load mode 

;now set go and parens 

;error flag set? 
;noi 



ENDS/BEGIN 

#60200, GLPCSRA 

PC,TSTFLG 
ftLPCSRA 

gLPTDAT,LPSUM 

GDSUM 

#VFUDAT,R1 

VFUSIZ,6l 

#VFUDAT-i,RO 



BIT 

BEQ 

JSR 

TSTB 

BPL 

To 

MOV 

MOVB 

ADD 

CMP 

BNE 

BIC 

RTS 

204 
CLR 
MOV 

MOVB 
INC 

TSTB 
BNE 



TOP* 



UM 



,R1 

77400, GDSUM 



;WAIT FOR A FLAG 

jPAGZRO,UNDCHR,DONE 
JDECIDE WHAT TO DO 

?TEST FOR DONE 

;NOT DONE YET 
;SAVE THE LP CHKSUM 
;NOW CALCULATE GOOD SUM 
CALCULATE ADR OF LAST BYTE 

JFIRST BYTE IS START CODE 



;LOOP BACK FOR REST OF BUFR 



MBYTES OF DATA FOR DAVFU 
TALLY ?CLEAR TALLY. 

#DATBUF,R5 






;LOAD PRINTER BUFFER. 
;UPDATE TALLY. 

?END OF MESSAGE? 
;NO! 

?YESI 

;SET MESSAGE SIZE. 



LPFB DEC/X11 SYSTEM EXERCISER 
XLPFB0.P11 12-OCT-78 11:59 



SMt^s 1052 ' 



mi* 



54* 



imn 000002 
mm- mm ooo ° 01 

88ii-ii- 881281 175542 

002274' 052777 
002302' 000207 
002304' 000000 



175543 
175533 



000004 175722 



12-OCT-78 16:52 PAGE 16 



;THIS ROUTINE IS CALLED TO TEST THE SOFTWARE REGISTER TN THF Mfinnr p 

{IKRKSM8 M e «i,gg"r5B MWBLCBiHMaoHf *"""" ?Es¥ ° S " 



SEQ 0015 



HUl S243 E "SSI 5A55 Snly 



-*§£r*r ~ y rrexni un inc. pikst pass UNLY 
?A F CODE 1 OF J 000? NTAINS * NY ° THER C0DE THE PR0GRAM DEFAULTS TO 



CKSR: 



is: 
2$: 
tally: 



GMPB 
BEQ 

CMPB 
BEQ 

TST 
BEQ 

BIS 

RTS 





#2,SR1-H 

»|,SR14-1 

P&SCNT 
2$ 

#TSTMOD,8LPCSRA 

PC 



?PRINT CONTINUOUSLY ?? 
>BR IF YES 



m 



:*;p PR'NT 77 



^INITIAL PASS ?? 
;br IF YES 

;set test mode - inhibit print 
jreturn to caller 



LPF 
XLP 



It* 



15il n s 

002306* 



HWWH! 



III 
if 



595 
596 



M 

i 

Hi. 

m 



_ x 50 
3$53 
~*56 



3U- 
30^( 



jj MHfl: 838 

19 000001 



356 
77 



88$ 



m 

020 

002 

888 
IH 

Hi 

8o 2 S 
355 

sas 

m 
m 
m 
m 
m 



DATBUFS .BLFTH 140. ;512 DAT* BYTES 

VFUDAT' " BYTE °' 356 ?START DAVFU LOAD CMD 

.BYTE * 77, 77, 20, 02, 24, 02, 30, 02 

.BYTE 24, 02, 20, 06, 34, 02, 20, 02 

.BYTE 24, 02, 30, 02, 64, 06, 20, 02 

.BYTE 34, 02, 20, 02, 24, 02, 30, 16 

.BYTE 24, 02, 20, 02, 34, 02, 20, 02 

.BYTE 64, 07, 30, 02, 24, 02, 20, 02 

.BYTE 34, 02, 20, 26, 24, 02, 30, 02 

.BYTE 24, 02, 20, 02, 76, 16, 20, 02 

.BYTE 24, 02, 30, 02, 24, 02, 20, 06 

*BYTE 34, 02, 20, 02, 24, 02, 30, 02 

.BYTE 64, 47, 20, 02, 34, 02, 20, 02 

.BYTE 24, 02, 30, 16, 24, 02, 20, 02 

.BYTE 34, 02, 20, 02, 64, 26, 30, 02 

.BYTE 24, 02, 20, 02, 34, 02, 20, 06 

.BYTE 24, 02, 30, 02, 24, 02, 20, 02 

.BYTE 20, 00, 20, 00, 20, 00, 20, 00 

.BYTE 20, 00, 20, 00, 00, 00 

• END 



SEQ 0016 



t?E§»R E £(J 11 SYSTEM EXE 
XLPFB0.P11 — 



„ RCISER 

12-0CT-78 11:59 



ACSR 

ADDR 

ADDR22= 

A SB 

ASfAT 

AHAS 

W : 

BITIO = 

HS : 

mil : 
IKl : 

Iffi: 

mi i 

brIIkss 

BR1 

!¥3ds = 

BUFFER 

BUSA16= 

B0SA17= 

mv s = 

SffEff 

mm. 

DATERS= 

nop- 

DONE = 
DYID1 

BBj T$ : 

mk . 
fjwr. 

GDSUM i 
GETPA$= i 
GO = I 

gwbofs= : 



000102R 
R 



i 



440 



00 z 
44l4 



171* 

:»! 

: 76f 

m 

89# 

ill! 



~89i 
1891 



f 
i 

446 

:n 
\m 

;». 

: 89# 

HI! 
Hi 



nn 
m 
in 



273* 
227 
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CROSS REFERENCE TABLE -- USER SYMBOLS 



263 270 310* 313 

in w ur m 



246 
365 

550# 

274* 
368* 

527 

276 
442 



37 1 
457 



448 
514* 



375# 

564# 

319 
536* 

468 506 
519* 522* 



'^^^m-"^^^ 



/Xli SYSTEM EXERCISER MODULE 
11 12-QCT-78 11:59 



MACY11 30AQ052) 12-OCT-78 16:52 PAGE 20 
CROSS REFERENCE TABLE — USER SYMBOLS 



iliiT 

INT = 

INTENB= 



LPCSRB 

ma 

LPfDAT 

mm* 
mil 

MODNAH 
MODSP 
MSGNS = 
MSGSS = 
MSGS a 



PHI} 



ItiiSfi 



imi i 



Hi 



23# 



pi: 

228* 
234* 

I? 

w- 

S26# 
537 
187# 

466 

488 



452 



189# 



If* 

442* 

mi 

513 



m 

481 



iW 



m 



409 
267* 



440 
293 



3 18 an 



496* 
294* 



497* 
308 



491 
307* 

«f. 

498* 
415* 



411* 

ill 



®r. 



m m nv i 



Ml Itt i§3 IS* 



"\ 



LPFB I 
XLPFBC 



EC/Xll SYSTEM EXERCISER MODULE 
.Pll 12-OCT-78 11:59 
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CROSS REFERENCE TABLE — USER SYMBOLS 



SEQ 0019 



lillT: 



RSTERRs 
RSTRT 
SBADR 
SETDEL 

iini- 

SPPLG 



m 



WDFfc 
WDTO 
XFLAG 



mi 
m 
m 

362R 



324 

409# 

284 298 304 419 

3298 

260 291 330 409 440 



482# 

182 

351 550 553 



227# 



530* 
373 

ill* 

445 

lilt 

244 



499 
379# 



515 



517 



567* 



SU 3M. " 5 * 



> 



= 003146R 375# 564# SE9 °° 2 ° 

. ABS. 



\ S5S9R? detected: o 

j DEFAULT GLOBALS GENERATED: 

r BCI!rfV p [TffffiKIH ,, " DMCO "' XLP " 



